home *** CD-ROM | disk | FTP | other *** search
/ El Mac 9 / El Mac 9.iso / Shareware / Applications / MathPad 2.4 / XFuns / linfit / linfit.rsrc / TEXT_128_linfit().txt next >
Encoding:
Text File  |  1996-03-07  |  366 b   |  13 lines
  1. -- linfit(XYarray)
  2.  
  3. -- Fits data to a straight line using linear regression formula.
  4. -- linfit() returns the correlation coefficient.
  5. -- The fit parameters are returned in global variables 'slope' and 'intercept'.
  6.  
  7. XY={{3,2},{4,4},{4,5},{3,3.5},{2,2},{0,0},{5,4},{1,1},{3,2.5},{1,2}}
  8.  
  9. plot XY
  10. linfit(XY):0.897
  11. slope:0.866;   intercept:0.348
  12. plot slope*X + intercept
  13.